home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Developer Source 6
/
developer source - volume 6.iso
/
parad
/
oct95
/
chalf103.gif
< prev
next >
Tile
Graphics Interchange Format
|
1996-11-19
|
24.4 KB
|
653x532
|
4-bit (15 colors)
ocr:
Paradox. for Windows File Edit View Search Program Properties Tools Window Help 1 4 to 100101 to UILISE-Lbratyl-Uses Uses ObjectPAL ncolumnsum (var tctmp icursor, aFld String) Number endUses method ncolumnsum (var tctmp TCursor, aFld String) Number returnlibutil2.ncolumnsun(tcTmp, aFld) endMethod - OTILZLSL-ALbrarylznColumnsum" method ncolumnsum(uar tctmp iCursor, aFld string) Number var nurandiotal number enduar scan tctmp : try nurandiotal = nurandiotal + ccimp.(arld) onFail msgInfoc"Error", "Cannot calculate sum") nurandlotal.Dlank() quitLoop endtry endScan return(GrandTotal) endmethod Proj ...